home *** CD-ROM | disk | FTP | other *** search
/ Star Festival... a Return to Japan / Star Festival... a Return to Japan.iso / pc / STARFESTIVAL / Opening.dir / 00100.ls < prev    next >
Encoding:
Text File  |  1999-09-21  |  162 b   |  10 lines
  1. on exitFrame
  2.   siterand = random(20)
  3.   if siterand < 10 then
  4.     go(1, "0" & string(siterand) & "r")
  5.   else
  6.     go(1, string(siterand) & "r")
  7.   end if
  8.   exit
  9. end
  10.